Otherware/Otherware_1_SB_Development.iso/mac/hypercar/fun/lzepp09.sit/Led Zeppelin 0.90/background_2786.xml

Extensible Markup Language | 1992-08-27 | 17.8 KB | 521 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>2786</id>
    <filler1>0</filler1>
    <bitmap>BMAP_3630.pbm</bitmap>
    <cantDelete> <true /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_3188.css" />
    <part>
        <id>20</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>303</left>
            <top>111</top>
            <right>376</right>
            <bottom>127</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Swap Alias</name>
        <script>on mouseUp
global titstring, lystring, oldline,akaline,oldtitle
if titstring is empty then
answer "click on the line you want to swap first"
set locktext of field aka to true
else
answer "swap main title for selected title?" with "no" or "yes"
if it is "yes" then
delete line akaline of field aka
put field title into oldtitle
put titstring into field title
put titstring&return before field aka
set lockscreen to true
push card
deletetitle
inserttitle
pop card
set lockscreen to false
end if

end if

end mouseup
</script>
    </part>
    <part>
        <id>23</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>378</left>
            <top>111</top>
            <right>441</right>
            <bottom>127</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Add Alias</name>
        <script>on mouseUp
global titstring
if short name of this card is "titlelist" then -- at TOC, pick a song
gotitle
if short name of this card is "titlelist" then
beep
exit mouseup -- still at TOC, didn't pick a song pick a song
end if
end if

ask "what is the alternate title?" with titstring
put it into titstring
if titstring is not empty then
if  not  (last char of field aka is return) then
put return after field aka
end if
put titstring after field aka
set the scroll of field aka to (number of lines of field aka-2)*9
answer "should alternate title be added to TOC card?"¬
with "yes" or "no"
if it is "yes" then

set the lockscreen to true
push card
insertTitle
pop card
set the lockscreen to false
end if
end if


end mouseup
</script>
    </part>
    <part>
        <id>24</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>443</left>
            <top>111</top>
            <right>510</right>
            <bottom>127</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Edit Alias</name>
        <script>on mouseUp --titstring & akaline set by script of field
global titstring, akaline, lystring,oldtitle
if titstring is empty then
answer "select the line you want to edit first"
else --
if akaline is 1 then
put titstring into oldtitle
answer "editing main title!" with "Cancel" or "OK"
else put "OK" into it

if it is "Cancel" then exit mouseup
else
put empty into it
ask "edit line below" with titstring
if it is not empty then
put it into titstring
put titstring into line akaline of field aka
else  --empty line
if akaline is 1 then
answer "Can't delete main title"
exit mouseup
end if
answer "do you really want to delete it?"¬
with "Cancel" or "Delete"
if it is "Delete" then delete line akaline of field aka
end if
end if

if akaline is 1 then --editting title?
set cursor to ball
set lockscreen to true
push card
put titstring  into field title
put "deleting old title:"&oldtitle
deletetitle      --delete old title!?
if oldtitle is not empty then --old title set to empty if not fnd
put "inserting new title:"&titstring
inserttitle
end if
pop card
set lockscreen to false
set cursor to hand
end if
end if
end mouseup
</script>
    </part>
    <part>
        <id>35</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>463</left>
            <top>312</top>
            <right>489</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>1014</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Prev</name>
        <script>on mouseUp
if the number of this card is 5 then
answer "This is the first song card."
else
visual effect scroll right
go to prev card
end if
end mouseUp

</script>
    </part>
    <part>
        <id>36</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>433</left>
            <top>316</top>
            <right>466</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>2162</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>GoSongs</name>
        <script>on mouseUp
visual scroll right
go to card "Song Lyrics & Notes"
end mouseUp

</script>
    </part>
    <part>
        <id>51</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>12</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Hide-A-Menu</name>
        <script>on mouseEnter
if the screenRect is "0,0,512,342" then show menubar
end mouseEnter

on mouseLeave
if the screenRect is "0,0,512,342" then hide menubar
end mouseLeave</script>
    </part>
    <part>
        <id>41</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>373</left>
            <top>68</top>
            <right>505</right>
            <bottom>237</bottom>
        </rect>
        <style>opaque</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>notes</name>
        <script></script>
    </part>
    <part>
        <id>44</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>372</left>
            <top>244</top>
            <right>436</right>
            <bottom>289</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>1004</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Text Output</name>
        <script>on mouseUp
put field title into fname
answer "Write the lyrics of "&fname&" to a TeachText file?" with Proceed or Cancel
if it is Proceed then
set cursor to watch
put field title&return&"by "&field author&return&"© "&¬
field copywrite &return&return&field lyrics into fcontent
open file fname
write fcontent to file fname
close file fname
setFileType fname, "TEXT", "ttxt"  -- XCMD
set cursor to hand
end if
end mouseUp

on mouseEnter
FullBalloons showSTR, 128    -- , "395,325"
end mouseEnter
</script>
    </part>
    <part>
        <id>45</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>443</left>
            <top>244</top>
            <right>507</right>
            <bottom>289</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>1014</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Go To Album</name>
        <script>on mouseUp
lock screen
put bkgnd field title into choice
go to card "Album Information"
find string choice
unlock screen with dissolve fast
end mouseUp</script>
    </part>
    <part>
        <id>47</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>473</left>
            <top>48</top>
            <right>512</right>
            <bottom>63</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>condense</textStyle>
        <textStyle>outline</textStyle>
        <textHeight>12</textHeight>
        <name>Time</name>
        <script></script>
    </part>
    <part>
        <id>15</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>19</left>
            <top>5</top>
            <right>339</right>
            <bottom>30</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>18</textSize>
        <textStyle>condense</textStyle>
        <textStyle>shadow</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>24</textHeight>
        <name>Title</name>
        <script></script>
    </part>
    <part>
        <id>16</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>354</left>
            <top>2</top>
            <right>512</right>
            <bottom>27</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>condense</textStyle>
        <textStyle>outline</textStyle>
        <textHeight>12</textHeight>
        <name>Author</name>
        <script></script>
    </part>
    <part>
        <id>38</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>6</left>
            <top>34</top>
            <right>364</right>
            <bottom>336</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>lyrics</name>
        <script>on mouseup
if the optionKey is down then set lockText of field lyrics to false
end mouseup

</script>
    </part>
    <part>
        <id>49</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>373</left>
            <top>293</top>
            <right>434</right>
            <bottom>340</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>20186</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>bold</textStyle>
        <name>Sort Songs</name>
        <script>on mouseUp
ask "Sort all songs according to:" with Title
if it is empty or it is "Cancel" then exit mouseUp
else if there is no bg field it then
answer "There is no bkgnd field" && it & "."
exit mouseUp
else put it into TheField
if TheField is Time then
put "dateTime" into sortType
else put "Text" into sortType
-- "Numeric" and "International" are other options
answer "In which direction do you want to sort?" with¬
"Descending" or "Ascending" or "Cancel"
if it is "Cancel" then exit mouseUp
put it into sortDirection
do "sort cards of this bkgnd" && sortDirection && sortType && "by bg field" && TheField
end mouseUp</script>
    </part>
    <part>
        <id>29</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>351</left>
            <top>33</top>
            <right>512</right>
            <bottom>49</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>condense</textStyle>
        <textStyle>outline</textStyle>
        <textHeight>12</textHeight>
        <name>copywrite</name>
        <script></script>
    </part>
    <part>
        <id>52</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>490</left>
            <top>313</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>1013</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Next</name>
        <script>on mouseUp
if the number of this card is 48 then
answer "This is the last song card."
else
visual effect scroll left
go to next card
end if
end mouseUp

</script>
    </part>
    <name>Song Bkgnd</name>
    <script>on doMenu iName, mName
if iName=Prev then
send mouseUp to background button "Prev"
else if iName=Next then
send mouseUp to background button "Next"
else pass doMenu
end doMenu</script>
</background>